(flyspell-external-point-words):

flyspell-get-word returns a list, not just a string.

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 0f0394ad4eae3b769eb3f48900fa9d64841a0699..a4d77213aec4ee12b13ca24c220b9340b834767f 100644 (file)
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1362,7 +1362,7 @@ The buffer to mark them in is `flyspell-large-region-buffer'."
                          ;; Detect when WORD can't be checked properly
                          ;; because flyspell-get-word finds
                          ;; just part of it, and treat that as ok.
-                         (if (< (length (flyspell-get-word nil))
+                         (if (< (length (car (flyspell-get-word nil)))
                                 (length word))
                              nil
                            (flyspell-word))))